
Public Class CNGItem

    Public iBillID As Integer = 0
    Private _intItemID As Integer

    Private _intQuantity As Integer
    Public intSoldQuantity As Integer = 0
    Public intReceivedQuantity As Integer = 0

    

    Private _intColorCode As Integer
    Public intPackUpdateDtl_PK As Integer = 0
    Private _strPack As String
    Public intPackSizeID As Integer
    Public intPackUpdateID As Integer
    Public intGodownID As Integer = 0

    Public dblRate As Double
    Private _strPurchaseUnit As String
    Public dblDISCAmt As Double
    Public strDisc As String
    Private _dblTax As Integer
    Public TaxAmt As Double
    Private _chrStatus As Char
    Private _Taxes As CTax()
    

    Private _dblSchemeDisc As Double = 0
    Private _dblAmount As Double = 0
    
    Private _bytIsStockUpdate As Byte = 0
    Public isTinTin As Boolean = False
    Public intTinTinID As Integer = 0
    Public intTinTinBaseID As Integer = 0




    Public Property IsStockUpdate() As Byte
        Get
            Return _bytIsStockUpdate
        End Get
        Set(ByVal value As Byte)
            _bytIsStockUpdate = value
        End Set
    End Property


    Public Property ItemID() As Integer
        Get
            Return _intItemID
        End Get
        Set(ByVal value As Integer)
            _intItemID = value
        End Set
    End Property


    Public Property Quantity() As Integer
        Get
            Return _intQuantity
        End Get
        Set(ByVal value As Integer)
            _intQuantity = value
        End Set
    End Property


    Public Property TaxID() As Integer
        Get
            Return _dblTax
        End Get
        Set(ByVal value As Integer)
            _dblTax = value
        End Set
    End Property

    Public Property Status() As Char
        Get
            Return _chrStatus
        End Get
        Set(ByVal value As Char)
            _chrStatus = value
        End Set
    End Property

    Public Property Taxes() As CTax()
        Get
            Return _Taxes
        End Get
        Set(ByVal value As CTax())
            _Taxes = value
        End Set
    End Property

    Public Property SchemeDiscount() As Double
        Get
            Return _dblSchemeDisc
        End Get
        Set(ByVal value As Double)
            _dblSchemeDisc = value
        End Set
    End Property

    Public Property Amount() As Double
        Get
            Return _dblAmount
        End Get
        Set(ByVal value As Double)
            _dblAmount = value
        End Set
    End Property




    Public Property ColorCode() As Integer
        Get
            Return _intColorCode
        End Get
        Set(ByVal value As Integer)
            _intColorCode = value
        End Set
    End Property


    Public Property PACK() As String
        Get
            Return _strPack
        End Get
        Set(ByVal value As String)
            _strPack = value
        End Set
    End Property

    'Public Property PurchaseUnit() As String
    '    Get
    '        Return _strPurUnit
    '    End Get
    '    Set(ByVal value As String)
    '        _strPurUnit = value
    '    End Set

    'End Property

    'Public Property PurchasePackType() As String
    '    Get
    '        Return _strPurchasePack
    '    End Get
    '    Set(ByVal value As String)
    '        _strPurchasePack = value
    '    End Set
    'End Property

    'Public Property FreeReplacement() As Char
    '    Get
    '        Return _chrFreeReplacement
    '    End Get
    '    Set(ByVal value As Char)
    '        _chrFreeReplacement = value
    '    End Set
    'End Property

End Class
